inherited FCadModeloBloco: TFCadModeloBloco
  Left = 720
  Top = 260
  Caption = 'Cadastro de Modelo de Bloco por empreendimento'
  PixelsPerInch = 96
  TextHeight = 13
  inherited pnl1: TPanel
    Height = 105
    inherited pnl7: TPanel
      Height = 0
    end
  end
  inherited pnl2: TPanel
    Top = 105
    Height = 382
    object lbl1: TLabel [5]
      Left = 8
      Top = 144
      Width = 106
      Height = 13
      Caption = 'EMPBLODESCRICAO'
      FocusControl = dbedtEMPBLODESCRICAO
    end
    object lbl2: TLabel [6]
      Left = 8
      Top = 64
      Width = 72
      Height = 13
      Caption = 'EMPREENDID'
      FocusControl = dbedtEMPREENDID
    end
    object lbl3: TLabel [7]
      Left = 8
      Top = 104
      Width = 55
      Height = 13
      Caption = 'EMPBLOID'
      FocusControl = dbedtEMPBLOID
    end
    object lbl4: TLabel [8]
      Left = 688
      Top = 144
      Width = 67
      Height = 13
      Caption = 'EMPBLOQTD'
      FocusControl = dbedtEMPBLOQTD
    end
    object dbedtEMPBLODESCRICAO: TDBEdit
      Left = 8
      Top = 160
      Width = 656
      Height = 21
      DataField = 'EMPBLODESCRICAO'
      DataSource = dsPadrao
      TabOrder = 5
    end
    object dbedtEMPREENDID: TDBEdit
      Left = 8
      Top = 80
      Width = 97
      Height = 21
      DataField = 'EMPREENDID'
      DataSource = dsPadrao
      TabOrder = 6
    end
    object dbedtEMPBLOID: TDBEdit
      Left = 8
      Top = 120
      Width = 97
      Height = 21
      DataField = 'EMPBLOID'
      DataSource = dsPadrao
      TabOrder = 7
    end
    object dbedtEMPBLOQTD: TDBEdit
      Left = 688
      Top = 160
      Width = 134
      Height = 21
      DataField = 'EMPBLOQTD'
      DataSource = dsPadrao
      TabOrder = 8
    end
    object Edit1: TEdit
      Left = 104
      Top = 80
      Width = 497
      Height = 21
      TabOrder = 9
      Text = 'Edit1'
    end
    object Edit2: TEdit
      Left = 104
      Top = 120
      Width = 497
      Height = 21
      TabOrder = 10
      Text = 'Edit2'
    end
    object Panel1: TPanel
      Left = 8
      Top = 188
      Width = 921
      Height = 17
      Anchors = [akLeft, akTop, akRight]
      Caption = 'Modelos'
      Color = clActiveCaption
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 11
    end
    object dbgrdEMPREENDIMENTOBLOCOMODELO: TDBGrid
      Left = 8
      Top = 208
      Width = 921
      Height = 169
      DataSource = dsEMPREENDIMENTOBLOCOMODELO
      TabOrder = 12
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      Columns = <
        item
          Expanded = False
          FieldName = 'EMPREENDID'
          Visible = False
        end
        item
          Expanded = False
          FieldName = 'EMPBLOID'
          Visible = False
        end
        item
          Expanded = False
          FieldName = 'MODID'
          Title.Caption = 'C'#243'd. Modelo'
          Width = 70
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'MODDESCRICAO'
          Title.Caption = 'Descri'#231#227'o'
          Visible = True
        end>
    end
  end
  inherited qPadrao: TQuery
    SQL.Strings = (
      'SELECT * FROM EMPREENDIMENTOBLOCO'
      'WHERE 1 = -1')
    object qPadraoEMPBLODESCRICAO: TStringField
      FieldName = 'EMPBLODESCRICAO'
      Origin = '"BDSISTEMA.FDB".EMPREENDIMENTOBLOCO.EMPBLODESCRICAO'
      Size = 100
    end
    object qPadraoEMPREENDID: TIntegerField
      FieldName = 'EMPREENDID'
      Origin = '"BDSISTEMA.FDB".EMPREENDIMENTOBLOCO.EMPREENDID'
    end
    object qPadraoEMPBLOID: TIntegerField
      FieldName = 'EMPBLOID'
      Origin = '"BDSISTEMA.FDB".EMPREENDIMENTOBLOCO.EMPBLOID'
    end
    object qPadraoEMPBLOQTD: TIntegerField
      FieldName = 'EMPBLOQTD'
      Origin = '"BDSISTEMA.FDB".EMPREENDIMENTOBLOCO.EMPBLOQTD'
    end
  end
  object QEMPREENDIMENTOBLOCOMODELO: TQuery
    DatabaseName = 'BDSistema.FDB'
    SQL.Strings = (
      'SELECT EBM.*, M.MODDESCRICAO FROM '
      'MODELO M,'
      'EMPREENDIMENTOBLOCOMODELO EBM'
      'WHERE '
      'M.MODID = EBM.MODID'
      'AND 1=-1')
    Left = 424
    Top = 345
    object QEMPREENDIMENTOBLOCOMODELOEMPREENDID: TIntegerField
      FieldName = 'EMPREENDID'
      Origin = '"BDSISTEMA.FDB".EMPREENDIMENTOBLOCOMODELO.EMPREENDID'
    end
    object QEMPREENDIMENTOBLOCOMODELOEMPBLOID: TIntegerField
      FieldName = 'EMPBLOID'
      Origin = '"BDSISTEMA.FDB".EMPREENDIMENTOBLOCOMODELO.EMPBLOID'
    end
    object QEMPREENDIMENTOBLOCOMODELOMODID: TIntegerField
      FieldName = 'MODID'
      Origin = '"BDSISTEMA.FDB".EMPREENDIMENTOBLOCOMODELO.MODID'
    end
    object QEMPREENDIMENTOBLOCOMODELOMODDESCRICAO: TStringField
      FieldName = 'MODDESCRICAO'
      Origin = '"BDSISTEMA.FDB".MODELO.MODDESCRICAO'
      Size = 100
    end
  end
  object dsEMPREENDIMENTOBLOCOMODELO: TDataSource
    DataSet = QEMPREENDIMENTOBLOCOMODELO
    Left = 456
    Top = 345
  end
end
